home *** CD-ROM | disk | FTP | other *** search
/ START Magazine / START VOL 3 NO 7.st / VCR_ORG.ARC / VCR_TYPE.PAS < prev    next >
Encoding:
Pascal/Delphi Source File  |  1988-11-11  |  953 b   |  32 lines
  1.      Name = string[40];
  2.  
  3.      Gem_Window = Record
  4.          RL_Button   : integer;
  5.          Up_Down     : integer;
  6.          B_Clicks    : integer;
  7.          Key_Input   : integer;
  8.          B_Count     : integer;
  9.          B_State     : integer;
  10.          X_Mouse     : integer;
  11.          Y_Mouse     : integer;
  12.          Key_State   : integer;
  13.          HiByte      : integer;
  14.          LoByte      : integer;
  15.          Character   : char;
  16.          Timing      : Long_Integer;
  17.          dummy       : integer;
  18.          msg         : Message_Buffer;
  19.          InBox1      : Boolean;
  20.          InBox2      : Boolean;
  21.          X_Pos       : array[1..2] of integer;
  22.          Y_Pos       : array[1..2] of integer;
  23.          Width       : array[1..2] of integer;
  24.          Height      : array[1..2] of integer;
  25.      end;
  26.  
  27.      Gem_Menu = record
  28.           Title : array[1..2]  of integer;
  29.           Item  : array[1..12] of integer;
  30.      end;
  31.  
  32.